projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
cd191c8
)
* lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Fix last change
author
Stefan Monnier
<monnier@iro.umontreal.ca>
Wed, 22 Feb 2017 02:32:27 +0000
(21:32 -0500)
committer
Stefan Monnier
<monnier@iro.umontreal.ca>
Wed, 22 Feb 2017 02:32:27 +0000
(21:32 -0500)
lisp/emacs-lisp/cl-generic.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/cl-generic.el
b/lisp/emacs-lisp/cl-generic.el
index d9321b13565ea6db7a6743750f3ab89767e485c2..b7695af32f6f97f834f6e3fdee16a52ce59c9f58 100644
(file)
--- a/
lisp/emacs-lisp/cl-generic.el
+++ b/
lisp/emacs-lisp/cl-generic.el
@@
-231,9
+231,9
@@
DEFAULT-BODY, if present, is used as the body of a default method.
(defalias ',name
(cl-generic-define ',name ',args ',(nreverse options))
,(help-add-fundoc-usage doc args))
+ :autoload-end
,@(mapcar (lambda (method) `(cl-defmethod ,name ,@method))
(nreverse methods)))
- :autoload-end
,@(mapcar (lambda (declaration)
(let ((f (cdr (assq (car declaration)
defun-declarations-alist))))